home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1996 #6 / Amiga Plus CD - 1996 - No. 06.iso / pd / texte / texfontinst / contrib / helminck / stonesmt.sty < prev    next >
Text File  |  1996-07-30  |  4KB  |  114 lines

  1. %%% This is file `stonesmt.sty', version <1.0c> 
  2. %%% 
  3. %%% Copyright (C) 1994 Aloysius G. Helminck. All rights reserved. 
  4. %%% Permission is granted to to customize the declarations in this 
  5. %%% file to serve the needs of your installation. However, no permission
  6. %%% is granted to distribute a modified version of this file under 
  7. %%% its original name. 
  8. %%%
  9. %%% This style file redefines the math symbols to: zstmtmr, zstmtmi, zstmtsy
  10. %%% and mtex. These fonts essentially are a combination of Stone Serif and
  11. %%% Mathtime fonts and are remapped to get fonts with the same
  12. %%% character tables as the cm-math fonts. 
  13. %%%  
  14.  
  15. \NeedsTeXFormat{LaTeX2e}
  16. \ProvidesPackage{stonesmt}[1994/04/29 Stone + Mathtime math fonts]
  17.  
  18. % The default family is Stone Serif. I scaled all of the Stone fonts to
  19. % have the same xheight as Times (see OT1pst.fd).
  20.  
  21. \renewcommand{\rmdefault}{pst}
  22. \def\bfdefault{sb}
  23.  
  24. % The math fonts are the umtm fonts.
  25.  
  26. \DeclareSymbolFont{operators}   {OT1}{zstmtt}{m}{n}
  27. \DeclareSymbolFont{letters}     {OML}{zstmtt}{m}{it}
  28. \DeclareSymbolFont{symbols}     {OMS}{zstmtt}{m}{n}
  29. \DeclareSymbolFont{largesymbols}{OMX}{mtt}{m}{n}
  30. %\DeclareSymbolFont{bold}        {OT1}{pst}{\bfdefault}{n}
  31. %\DeclareSymbolFont{italic}      {OT1}{pst}{m}{it}
  32. \SetMathAlphabet{\mathbf}{normal}{\encodingdefault}{\rmdefault}{\bfdefault}{n}%
  33. \SetMathAlphabet{\mathsf}{normal}{\encodingdefault}{\sfdefault}{m}{n}%
  34. \SetMathAlphabet{\mathrm}{normal}{\encodingdefault}{\rmdefault}{m}{n}%
  35.  
  36. % Bold math from the CM fonts.
  37. %
  38. %\SetSymbolFont{operators}{bold}{OT1}{crm}{b}{n}
  39. %\SetSymbolFont{letters}{bold}{OML}{cmm}{b}{it}
  40. %\SetSymbolFont{symbols}{bold}{OMS}{cmsy}{b}{n}
  41. %\SetSymbolFont{largesymbols}{bold}{OMX}{mtt}{m}{n}
  42. %\SetMathAlphabet{\mathbf}{bold}{\encodingdefault}{\rmdefault}{m}{n}%
  43. %\SetMathAlphabet{\mathsf}{bold}{\encodingdefault}{\sfdefault}{b}{n}%
  44. %\SetMathAlphabet{\mathrm}{bold}{\encodingdefault}{\rmdefault}{b}{n}%
  45. %
  46.  
  47. % Or bold math from Stone
  48.  
  49. \SetSymbolFont{operators}{bold}{OT1}{zstmtt}{b}{n}
  50. \SetSymbolFont{letters}{bold}{OML}{zstmtt}{b}{it}
  51. \SetSymbolFont{symbols}{bold}{OMS}{zstmtt}{b}{n}
  52. \SetSymbolFont{largesymbols}{bold}{OMX}{mtt}{m}{n}
  53. \SetMathAlphabet{\mathbf}{bold}{\encodingdefault}{\rmdefault}{m}{n}%
  54. \SetMathAlphabet{\mathsf}{bold}{\encodingdefault}{\sfdefault}{b}{n}%
  55. \SetMathAlphabet{\mathrm}{bold}{\encodingdefault}{\rmdefault}{\bfdefault}{n}%
  56.  
  57.  
  58. % An \omicron command, to fill the gap.
  59.  
  60. \DeclareMathSymbol{\omicron}{0}{operators}{`\o}
  61.  
  62. % Two extra symbols from the mathtime family:
  63.  
  64. \DeclareMathSymbol{\varkappa}{0}{letters}{"80}
  65. \DeclareMathSymbol{\comp}{2}{letters}{"81}
  66.  
  67. \def\hbar{{\mathchar'26\mkern-6.7muh}}
  68. \def\angle{{\vbox{\ialign{$\m@th\scriptstyle##$\crcr
  69.      \not\mathrel{\mkern14mu}\crcr
  70.      \noalign{\nointerlineskip}
  71.      \mkern2.5mu\leaders\hrule height.34pt\hfill\mkern2.5mu\crcr}}}}
  72.  
  73. % Reduce the space around math operators
  74.  
  75. \thinmuskip=2.5mu
  76. \medmuskip=3.5mu plus 1mu minus 1mu
  77. \thickmuskip=4.5mu plus 1.5mu minus 1mu
  78.  
  79. % If you do not want boldmath, then uncomment the
  80. % following. 
  81.  
  82. % \def\boldmath{%
  83. %    \@warning{there is no bold Symbol font}%
  84. %    \global\let\boldmath=\relax
  85. % }
  86.  
  87.  
  88. %%
  89. %%  \matrix can be defined similar as for AMSLaTeX:
  90. %%
  91. %
  92. %\newcount\c@MaxMatrixCols
  93. %\c@MaxMatrixCols=10
  94. %\def\matrix{\hskip -\arraycolsep\array{*\c@MaxMatrixCols c}}
  95. %\def\endmatrix{\endarray \hskip -\arraycolsep}
  96. %
  97.  
  98.  
  99. %%
  100. %% If you use Textures fonts for your Roman family, then you need to
  101. %% redefine the \AA macro for Plain and LaTeX. The macro depend on the
  102. %% size of the box for the CM ring character to be much wider than
  103. %% just the width of the ring. The times-roman (or other postcript)
  104. %% character is quite small and will offset the ring far to the left. 
  105. %% We adjust the size of the box for the ring to be placed in so that
  106. %% it works "reasonably well" for roman, italic, and bold
  107. %% versions. Uncomment the next two lines if you need this correction. 
  108. %\def\AA{\leavevmode\setbox0\hbox{A}\dimen@\ht0\advance\dimen@-0.85ex%
  109. %  \rlap{\raise.67\dimen@\hbox to \wd0{\hss\char'27\hss}}A}
  110.  
  111. \endinput
  112.  
  113.  
  114.